home *** CD-ROM | disk | FTP | other *** search
/ STraTOS 1997 April & May / STraTOS 1 - 1997 April & May.iso / CD01 / GNU_KIT / DISK7.ZIP / lib / tmac / tmac.an next >
Encoding:
Text File  |  1992-07-14  |  14.4 KB  |  590 lines
  1. .\" @(*) tmac.an 1.2p0 92/7/14 rosenkra
  2. .\" **************************************************************************
  3. .\" -man package for nroff. almost unix(tm), adequate/working...
  4. .\"
  5. .\" note: needs .tm for .IX and .CX, also uses .ie/.el
  6. .\"
  7. .\" usage:        nroff -man file
  8. .\" installed path:    c:\lib\tmac\tmac.an (TMACDIR)
  9. .\" user macros:    TH, SH, SS, IP, HP, PP, LP, RS, RE, IX, CX
  10. .\"            R, I, B, SM, IR, RI, BR, RB, BI, IB, PD
  11. .\" extensions:        EX, Th, pp, RP
  12. .\" no-ops:        
  13. .\" debuging:        }D
  14. .\" internal macros:    none
  15. .\" strings used:    S, ux, lq, rq, `, ', DW, Dy, Da, Yr, DY, TM, DA, CT,
  16. .\"            Se
  17. .\" registers used:    I, D, M, O, X, Z (user can set O for online)
  18. .\" bugs:        IP does not place short tags on same line.
  19. .\"            no TP, DT.
  20. .\"            no \*R (macros and strings share namespace).
  21. .\" notes:        change all "0.8i" below to "0.5i" for more unix-like
  22. .\"            compatability
  23. .\" author:        rosenkra@convex.com (Bill Rosenkranz)
  24. .\" version:        for ST nroff v1.2p0
  25. .\" date:        92/7/14
  26. .\" restrictions:    none. freely distributable (no copyright, etc.)
  27. .\"
  28. .\" **************************************************************************
  29. .\"
  30. .\" control
  31. .\"
  32. .\" set register O on command line (-rO1) to make manpage for online viewing
  33. .\" i.e. without headers/footers and with exit macro. or else make $6 in TH
  34. .\" "ONLINE" to do the same. this sets register X to 1.
  35. .\"
  36. .\" set this >0 to turn on debugging
  37. .nr Z 0
  38. .\" set this >0 for use with manpager(1) (sets special chars, fonts)
  39. .nr M 1
  40. .\" set paragraph distance
  41. .nr D 1
  42. .\" set relative indent register
  43. .nr I 0
  44. .\"
  45. .\" **************************************************************************
  46. .\"
  47. .\" some predefined strings (quotes, etc)
  48. .\"
  49. .ds Me tmac.an
  50. .ie \nM>0 \{\
  51. .\".    ds R  ┐
  52. .    ds S s
  53. .    ds lq !
  54. .    ds rq "
  55. .    ds `  `
  56. .    ds '  '
  57. .    ds ux Unix┐
  58. \}
  59. .el \{\
  60. .\".    ds R  (Reg)
  61. .    ds S s
  62. .    ds lq ""
  63. .    ds rq ""
  64. .    ds `  `
  65. .    ds '  '
  66. .    ds ux Unix(tm)
  67. \}
  68. .\"
  69. .\" these are various predefined date and time strings
  70. .\"
  71. .\" DW day-of-week:
  72. .if \n(dw=1  .ds DW "Sun
  73. .if \n(dw=2  .ds DW "Mon
  74. .if \n(dw=3  .ds DW "Tue
  75. .if \n(dw=4  .ds DW "Wed
  76. .if \n(dw=5  .ds DW "Thu
  77. .if \n(dw=6  .ds DW "Fri
  78. .if \n(dw=7  .ds DW "Sat
  79. .\" Dy month day:
  80. .if \n(mo=1  .ds Dy "Jan \n(dy
  81. .if \n(mo=2  .ds Dy "Feb \n(dy
  82. .if \n(mo=3  .ds Dy "Mar \n(dy
  83. .if \n(mo=4  .ds Dy "Apr \n(dy
  84. .if \n(mo=5  .ds Dy "May \n(dy
  85. .if \n(mo=6  .ds Dy "Jun \n(dy
  86. .if \n(mo=7  .ds Dy "Jul \n(dy
  87. .if \n(mo=8  .ds Dy "Aug \n(dy
  88. .if \n(mo=9  .ds Dy "Sep \n(dy
  89. .if \n(mo=10 .ds Dy "Oct \n(dy
  90. .if \n(mo=11 .ds Dy "Nov \n(dy
  91. .if \n(mo=12 .ds Dy "Dec \n(dy
  92. .ds Da "\n(hh:\n(mm:\n(ss \n(mo/\n(dy/\n(yr
  93. .ds Yr "19\n(yr
  94. .ds DY "\*(Dy, \*(Yr
  95. .ds TM "\n(hh:\n(mm:\n(ss
  96. .ds DA "\*(TM \*(DY
  97. .ds CT "\*(DW \*(Dy \*(TM 19\n(yr
  98. .\"
  99. .\" they look like this:
  100. .\"
  101. .\"    DW    Sun
  102. .\"     Dy    Mar 4
  103. .\"     DY    Mar 4, 1990
  104. .\"    Yr    1990
  105. .\"     TM    16:34:00
  106. .\"     DA    16:34:00 Mar 4, 1990
  107. .\"    Da    16:34:00 2/4/90
  108. .\"     CT    Sun Mar 4 16:34:00 1990        like ctime(2)
  109. .\"
  110. .\" **************************************************************************
  111. .\"
  112. .\" startup stuff...
  113. .\"
  114. .\" X is number register used internally here. it is initially 0. it gets
  115. .\" set to 1 in TH if ONLINE is set. it is used in the EX macro to force
  116. .\" an immediate exit at the end. user can also force ONLINE with -rO1.
  117. .\"
  118. .in 0.0i
  119. .po 0.0i
  120. .lt 7.2i
  121. .ll 7.2i
  122. .m1 3
  123. .m2 3
  124. .m3 3
  125. .m4 3
  126. .nr X 0
  127. .\" set exit macro (mainly for ONLINE, no-op if not)
  128. .em EX
  129. .\"
  130. .\" **************************************************************************
  131. .\"
  132. .\" MACROS...
  133. .\"
  134. .\" ----------------------------------------------------------------------- TH
  135. .\" main page heading
  136. .\"
  137. .\" fields are usually: 1-name, 2-section, 3-section name, 4-version, 5-date
  138. .\" 1,2,3 are on header, 4,5 and page on footer. empty strings are skipped
  139. .\" by making the arg "". this must be first! there is an extra field at the
  140. .\" end ($6) which, if "ONLINE", prints the page without page breaks (i.e.
  141. .\" headers/footers).
  142. .\"
  143. .\"    $1   $2                  $3
  144. .\"      |    |                   |
  145. .\"      v    v                   v
  146. .\"    NAME (1)               Section                 NAME (1)
  147. .\"    ...
  148. .\"    Version                 Date                     Page n
  149. .\"        ^                      ^
  150. .\"        |                      |
  151. .\"      $4                     $5
  152. .\"
  153. .\"    .TH NAME 1 "Commands" "Version 1.0" "7 March 1990" ["ONLINE"]
  154. .\"
  155. .\" there is an extension here: if the 6th argument is "ONLINE" then the
  156. .\" resultant output does not have any headers/footers. this is useful for
  157. .\" making manpages for online use.
  158. .\"
  159. .de TH
  160. .if \n(.$<2 \{\
  161. .    sp 2
  162. \&\*(Me: FATAL ERROR, too few args for TH
  163. .    sp 2
  164. .    ex
  165. \}
  166. .if !\nO>0 \{\
  167. .\"    define Se as default chapter name based on input chapter number
  168. .    if $2=0 .ds Se "General Information
  169. .    if $2=1 .ds Se "Commands and Applications
  170. .    if $2=2 .ds Se "System Calls
  171. .    if $2=3 .ds Se "Library Calls
  172. .    if $2=4 .ds Se "Hardware and Special Files
  173. .    if $2=5 .ds Se "File Formats
  174. .    if $2=6 .ds Se "Games
  175. .    if $2=7 .ds Se "Miscellaneous
  176. .    if $2=8 .ds Se "Administation Commands
  177. \}
  178. .\" if the 6th arg is "ONLINE", set up for online docs output (no head/foot)
  179. .\" the X reg is used by macro EX (exit). the user can force ONLINE by
  180. .\" setting reg "O" on cmdline (-rO1)
  181. .if \n(.$>5 .if "$6"ONLINE" .nr O 1
  182. .ie \nO>0 \{\
  183. .\"     no headers of footers (ONLINE)
  184. .    m1 0
  185. .    m2 0
  186. .    m3 0
  187. .    m4 0
  188. .    nr X 1
  189. \}
  190. .el \{\
  191. .\"     set page len, include headers of footers (!ONLINE)
  192. .    pl 66
  193. .    if \n(.$<3 .tl |$1($2)|\*(Se|$1($2)|
  194. .    if \n(.$>2 .if !"$3"" .tl |$1($2)|$3|$1($2)|
  195. .    if \n(.$>2 .if "$3""  .tl |$1($2)|\*(Se|$1($2)|
  196. .    if \n(.$<4 .fo |Atari ST|Printed: \*(DY|Page %|
  197. .    if \n(.$<5 .if "$4""  .fo |Atari ST|Printed: \*(DY|Page %|
  198. .    if \n(.$<5 .if !"$4"" .fo |$4|Printed: \*(DY|Page %|
  199. .    if \n(.$>4 .if !"$4"" .if !"$5"" .fo |$4|Release: $5|Page %|
  200. .    if \n(.$>4 .if !"$4"" .if "$5""  .fo |$4|Printed: \*(DY|Page %|
  201. .    if \n(.$>4 .if "$4""  .if !"$5"" .fo |Atari ST|Release: $5|Page %|
  202. .    if \n(.$>4 .if "$4""  .if "$5""  .fo |Atari ST|Printed: \*(DY|Page %|
  203. \}
  204. .in 0.8i
  205. ..
  206. .\" ----------------------------------------------------------------------- Th
  207. .\" alternate main page heading
  208. .\"
  209. .\" this prints no header/footer so it is good for creating online docs
  210. .\" for man(1). it ignores all args.
  211. .\"
  212. .\"    .Th NAME 1
  213. .\"
  214. .de Th
  215. .m1 0
  216. .m2 0
  217. .m3 0
  218. .m4 0
  219. .in 0.8i
  220. .nr X 1
  221. ..
  222. .\" ----------------------------------------------------------------------- EX
  223. .\" exit NOW if ONLINE. (no extra space at end of document)
  224. .\"
  225. .de EX
  226. .if \nX>0 \{\
  227. .    sp
  228. .    fl
  229. .    ex
  230. \}
  231. ..
  232. .\" ----------------------------------------------------------------------- PD
  233. .\" set paragraph distance
  234. .\"
  235. .de PD
  236. .ie \n(.$=0 .nr D 1
  237. .el .nr D $1
  238. ..
  239. .\" ----------------------------------------------------------------------- RS
  240. .\" start relative indent. does not add space.
  241. .\"
  242. .de RS
  243. .br
  244. .\"    .sp 1
  245. .ie \n(.$=0 \{\
  246. .    in +0.8i
  247. .    nr I +0.8i
  248. \}
  249. .el \{\
  250. .    in +$1
  251. .    nr I +$1
  252. \}
  253. ..
  254. .\" ----------------------------------------------------------------------- RE
  255. .\" end relative indent. does not add space.
  256. .\"
  257. .de RE
  258. .br
  259. .ie \n(.$=0 \{\
  260. .    in -0.8i
  261. .    nr I -0.8i
  262. \}
  263. .el \{\
  264. .    in -$1
  265. .    nr I -$1
  266. \}
  267. ..
  268. .\" ----------------------------------------------------------------------- IP
  269. .\" indented paragraph with tag (from this line)
  270. .\"
  271. .de IP
  272. .\" new version, with indent as $2. tag MUST be quoted to include blanks...
  273. .br
  274. .if \nD>0 \{\
  275. .    sp \nD
  276. \}
  277. .in 0.8i
  278. .in +\nI
  279. .if \n(.$>0 .if !"$1"" \&$1
  280. .br
  281. .if \n(.$<2 .in +0.8i
  282. .if \n(.$>1 .in +$2
  283. ..
  284. .\" ----------------------------------------------------------------------- HP
  285. .\" indented paragraph with hanging indent, no tag. first resets absolute ind.
  286. .\"
  287. .de HP
  288. .br
  289. .if \nD>0 \{\
  290. .    sp \nD
  291. \}
  292. .in 0.8i
  293. .in +\nI
  294. .ie \n(.$=0 \{\
  295. .    in +0.8i
  296. .    ti -0.8i
  297. \}
  298. .el \{\
  299. .    in +$1
  300. .    ti -$1
  301. \}
  302. ..
  303. .\" ----------------------------------------------------------------------- RP
  304. .\" relative indented paragraph with tag. MUST end with .RE
  305. .\"
  306. .de RP
  307. .br
  308. .if \nD>0 \{\
  309. .    sp \nD
  310. \}
  311. \&$1
  312. .br
  313. .if \n(.$<2 \{\
  314. .    in +0.8i
  315. \}
  316. .if \n(.$>1 \{\
  317. .    in +$2
  318. \}
  319. ..
  320. .\" ----------------------------------------------------------------------- pp
  321. .\" start a new indented paragraph
  322. .\"
  323. .de pp
  324. .if \nD>0 \{\
  325. .    sp \nD
  326. \}
  327. .in 0.8i
  328. .nr I 0
  329. .ti +0.8i
  330. ..
  331. .\" ----------------------------------------------------------------------- PP
  332. .\" start a new unindented paragraph
  333. .\"
  334. .de PP
  335. .if \nD>0 \{\
  336. .    sp \nD
  337. \}
  338. .in 0.8i
  339. .nr I 0
  340. ..
  341. .\" ----------------------------------------------------------------------- LP
  342. .\" start a new unindented paragraph (same as PP)
  343. .\"
  344. .de LP
  345. .if \nD>0 \{\
  346. .    sp \nD
  347. \}
  348. .in 0.8i
  349. .nr I 0
  350. ..
  351. .\" ----------------------------------------------------------------------- SH
  352. .\" main section heading
  353. .\"
  354. .de SH
  355. .if \n(.$<1 \{\
  356. .    sp 2
  357. \&\*(Me: FATAL ERROR, too few args for SH
  358. .    sp 2
  359. .    ex
  360. \}
  361. .sp 1
  362. .ne 3
  363. .in 0.8i
  364. .nr D 1
  365. .nr I 0
  366. .ti -0.8i
  367. .ie \nM>0 \{\
  368. .    if \n(.$=1 \&\fB$1\fR
  369. .    if \n(.$=2 \&\fB$1\fR \fB$2\fR
  370. .    if \n(.$=3 \&\fB$1\fR \fB$2\fR \fB$3\fR
  371. .    if \n(.$=4 \&\fB$1\fR \fB$2\fR \fB$3\fR \fB$4\fR
  372. .    if \n(.$=5 \&\fB$1\fR \fB$2\fR \fB$3\fR \fB$4\fR \fB$5\fR
  373. .    if \n(.$=6 \&\fB$1\fR \fB$2\fR \fB$3\fR \fB$4\fR \fB$5\fR \fB$6\fR
  374. \}
  375. .el \&$1 $2 $3 $4 $5 $6
  376. .br
  377. ..
  378. .\" ----------------------------------------------------------------------- SS
  379. .\" subsection heading, same indent
  380. .\"
  381. .de SS
  382. .if \n(.$<1 \{\
  383. .    sp 2
  384. \&\*(Me: FATAL ERROR, too few args for SS
  385. .    sp 2
  386. .    ex
  387. \}
  388. .sp 1
  389. .ne 3
  390. .in 0.8i
  391. .nr D 1
  392. .nr I 0
  393. .ie \nM>0 \{\
  394. .    if \n(.$=1 \&\fB$1\fR
  395. .    if \n(.$=2 \&\fB$1\fR \fB$2\fR
  396. .    if \n(.$=3 \&\fB$1\fR \fB$2\fR \fB$3\fR
  397. .    if \n(.$=4 \&\fB$1\fR \fB$2\fR \fB$3\fR \fB$4\fR
  398. .    if \n(.$=5 \&\fB$1\fR \fB$2\fR \fB$3\fR \fB$4\fR \fB$5\fR
  399. .    if \n(.$=6 \&\fB$1\fR \fB$2\fR \fB$3\fR \fB$4\fR \fB$5\fR \fB$6\fR
  400. \}
  401. .el \&$1 $2 $3 $4 $5 $6
  402. .sp
  403. ..
  404. .\" ----------------------------------------------------------------------- IX
  405. .\" make index entry (ignored by this nroff...)
  406. .\"
  407. .de IX
  408. .tm \&$1 \n%
  409. ..
  410. .de CX
  411. .tm \&$1 \n%
  412. ..
  413. .\"
  414. .\"
  415. .\"        font switching macros...
  416. .\"
  417. .\"
  418. .\"
  419. .\" ----------------------------------------------------------------------- I
  420. .\" italic text (must handle at least 2 args)
  421. .\"
  422. .de I
  423. .ie \nM>0 \{\
  424. .    if \n(.$<1 \&\fI
  425. .    if \n(.$=1 \&\fI$1\fR
  426. .    if \n(.$=2 \&\fI$1$2\fR
  427. .    if \n(.$=3 \&\fI$1$2$3\fR
  428. .    if \n(.$=4 \&\fI$1$2$3$4\fR
  429. .    if \n(.$=5 \&\fI$1$2$3$4$5\fR
  430. .    if \n(.$=6 \&\fI$1$2$3$4$5$6\fR
  431. \}
  432. .el \&$1$2$3$4$5$6
  433. ..
  434. .\" ----------------------------------------------------------------------- B
  435. .\" bold text (must handle at least 2 args)
  436. .\"
  437. .de B
  438. .ie \nM>0 \{\
  439. .    if \n(.$<1 \&\fB
  440. .    if \n(.$=1 \&\fB$1\fR
  441. .    if \n(.$=2 \&\fB$1$2\fR
  442. .    if \n(.$=3 \&\fB$1$2$3\fR
  443. .    if \n(.$=4 \&\fB$1$2$3$4\fR
  444. .    if \n(.$=5 \&\fB$1$2$3$4$5\fR
  445. .    if \n(.$=6 \&\fB$1$2$3$4$5$6\fR
  446. \}
  447. .el \&$1$2$3$4$5$6
  448. ..
  449. .\" ----------------------------------------------------------------------- R
  450. .\" Roman text
  451. .\"
  452. .de R
  453. .ie \nM>0 \{\
  454. .    if \n(.$<1 \&\fR
  455. .    if \n(.$=1 \&\fR$1
  456. .    if \n(.$=2 \&\fR$1$2
  457. .    if \n(.$=3 \&\fR$1$2$3
  458. .    if \n(.$=4 \&\fR$1$2$3$4
  459. .    if \n(.$=5 \&\fR$1$2$3$4$5
  460. .    if \n(.$=6 \&\fR$1$2$3$4$5$6
  461. \}
  462. .el \&$1$2$3$4$5$6
  463. ..
  464. .\" ----------------------------------------------------------------------- SM
  465. .\" small text (note: this only works with manpager!!!)
  466. .\"
  467. .de SM
  468. .ie \nM>0 \{\
  469. .    if \n(.$<1 \&\s-2
  470. .    if \n(.$=1 \&\s-2$1\s0
  471. .    if \n(.$=2 \&\s-2$1$2\s0
  472. .    if \n(.$=3 \&\s-2$1$2$3\s0
  473. .    if \n(.$=4 \&\s-2$1$2$3$4\s0
  474. .    if \n(.$=5 \&\s-2$1$2$3$4$5\s0
  475. .    if \n(.$=6 \&\s-2$1$2$3$4$5$6\s0
  476. \}
  477. .el \&$1$2$3$4$5$6
  478. ..
  479. .\" ----------------------------------------------------------------------- IR
  480. .\" alternate italic and Roman text (must handle at least 6 args)
  481. .\"
  482. .de IR
  483. .ie \nM>0 \{\
  484. .    if \n(.$=1 \&\fI$1\fR
  485. .    if \n(.$=2 \&\fI$1\fR$2
  486. .    if \n(.$=3 \&\fI$1\fR$2\fI$3\fR
  487. .    if \n(.$=4 \&\fI$1\fR$2\fI$3\fR$4
  488. .    if \n(.$=5 \&\fI$1\fR$2\fI$3\fR$4\fI$5\fR
  489. .    if \n(.$=6 \&\fI$1\fR$2\fI$3\fR$4\fI$5\fR$6
  490. \}
  491. .el \&$1$2$3$4$5$6
  492. ..
  493. .\" ----------------------------------------------------------------------- RI
  494. .\" alternate Roman and italic text (must handle at least 6 args)
  495. .\"
  496. .de RI
  497. .ie \nM>0 \{\
  498. .    if \n(.$=1 \&\fR$1
  499. .    if \n(.$=2 \&\fR$1\fI$2\fR
  500. .    if \n(.$=3 \&\fR$1\fI$2\fR$3
  501. .    if \n(.$=4 \&\fR$1\fI$2\fR$3\fI$4\fR
  502. .    if \n(.$=5 \&\fR$1\fI$2\fR$3\fI$4\fR$5
  503. .    if \n(.$=6 \&\fR$1\fI$2\fR$3\fI$4\fR$5\fI$6\fR
  504. \}
  505. .el \&$1$2$3$4$5$6
  506. ..
  507. .\" ----------------------------------------------------------------------- BR
  508. .\" alternate bold and Roman text (must handle at least 6 args)
  509. .\"
  510. .de BR
  511. .ie \nM>0 \{\
  512. .    if \n(.$=1 \&\fB$1\fR
  513. .    if \n(.$=2 \&\fB$1\fR$2
  514. .    if \n(.$=3 \&\fB$1\fR$2\fB$3\fR
  515. .    if \n(.$=4 \&\fB$1\fR$2\fB$3\fR$4
  516. .    if \n(.$=5 \&\fB$1\fR$2\fB$3\fR$4\fB$5\fR
  517. .    if \n(.$=6 \&\fB$1\fR$2\fB$3\fR$4\fB$5\fR$6
  518. \}
  519. .el \&$1$2$3$4$5$6
  520. ..
  521. .\" ----------------------------------------------------------------------- RB
  522. .\" alternate Roman and bold text (must handle at least 6 args)
  523. .\"
  524. .de RB
  525. .ie \nM>0 \{\
  526. .    if \n(.$=1 \&\fR$1
  527. .    if \n(.$=2 \&\fR$1\fB$2\fR
  528. .    if \n(.$=3 \&\fR$1\fB$2\fR$3
  529. .    if \n(.$=4 \&\fR$1\fB$2\fR$3\fB$4\fR
  530. .    if \n(.$=5 \&\fR$1\fB$2\fR$3\fB$4\fR$5
  531. .    if \n(.$=6 \&\fR$1\fB$2\fR$3\fB$4\fR$5\fB$6\fR
  532. \}
  533. .el \&$1$2$3$4$5$6
  534. ..
  535. .\" ----------------------------------------------------------------------- BI
  536. .\" alternate bold and italic text (must handle at least 6 args)
  537. .\"
  538. .de BI
  539. .ie \nM>0 \{\
  540. .    if \n(.$=1 \&\fB$1\fR
  541. .    if \n(.$=2 \&\fB$1\fI$2\fR
  542. .    if \n(.$=3 \&\fB$1\fI$2\fB$3\fR
  543. .    if \n(.$=4 \&\fB$1\fI$2\fB$3\fI$4\fR
  544. .    if \n(.$=5 \&\fB$1\fI$2\fB$3\fI$4\fB$5\fR
  545. .    if \n(.$=6 \&\fB$1\fI$2\fB$3\fI$4\fB$5\fI$6\fR
  546. \}
  547. .el \&$1$2$3$4$5$6
  548. ..
  549. .\" ----------------------------------------------------------------------- IB
  550. .\" alternate italic and bold text (must handle at least 6 args)
  551. .\"
  552. .de IB
  553. .ie \nM>0 \{\
  554. .    if \n(.$=1 \&\fI$1\fR
  555. .    if \n(.$=2 \&\fI$1\fB$2\fR
  556. .    if \n(.$=3 \&\fI$1\fB$2\fI$3\fR
  557. .    if \n(.$=4 \&\fI$1\fB$2\fI$3\fB$4\fR
  558. .    if \n(.$=5 \&\fI$1\fB$2\fI$3\fB$4\fI$5\fR
  559. .    if \n(.$=6 \&\fI$1\fB$2\fI$3\fB$4\fI$5\fB$6\fR
  560. \}
  561. .el \&$1$2$3$4$5$6
  562. ..
  563. .\"
  564. .\"
  565. .\"
  566. .\"
  567. .\" ----------------------------------------------------------------------- }D
  568. .\" debug. use (e.g. print current indent):
  569. .\"
  570. .\"    .}D .br
  571. .\"    .}D "** DEBUG ** before RS \n(.i"
  572. .\"
  573. .de }D
  574. .if \nZ>0 \&$1 $2 $3 $4 $5 $6 $7 $8
  575. ..
  576. .\"
  577. .\"
  578. .\" print macros first if debugging...
  579. .if \nZ>0 \{\
  580. .    sp 2
  581. Macros Defined:
  582. .    sp 2
  583. .    pm T
  584. .    sp 2
  585. End Macro Definitions.
  586. .    sp 4
  587. \}
  588. .\"
  589. .\" end of tmac.an
  590.